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COMMENTS 
FROM THE 
PUBLISHER 


The 6800 ICCD is now running. 
Soon the CHIP will be mailed and with 
some degree of regularity you subscrip- 
tion will be maintained. Lots of ex- 
citing things are happening in the 
world of the 6800. Before we mention 
the excitement, perhaps we should 
speak of some caution and needs to 
protect the 6800 world. Outside of the 
6800 universe there is a galaxy produc- 
ing Pet and Radio Shack TRS-80 Com- 
puters. The 6800 computer manufac- 
turers by-in-large are few in number 
and do not approach the super bigness 
of Pet and Radio Shack. The ICCD 
was formed to serve the 6800 user. We 
believe that ICCD can be the vehicle to 
promote and disseminate the ad- 
vantages which outway other systems. 
Since our first communication, 
SWTPC and Smoke Signal have joined 
to assist you through their support of 
ICCD. Others will follow. If you have 
personal interface with any other 
manufacturers, please send them this 
way. We will be asking shortly for 
your assistance in preparing a master 
registry of all 6800 users. This will 
solidify our communications as well as 
pass on innovations without the usual 
delays encountered. A ICCD test con- 
sole is being constructed—when com- 
plete pictures will appear in the Journal 
or CHIP. 

Your Editor recently visited and saw 
the assembly line of the Microcom- 
puter Devices Inc., “ Selectra-Term.” 
Impressive and built from brand-new 
(shipped from IBM) 15’’ Selectric II 
Typewriters. If you are interested give 
Shelly Howard a call. 

Be sure to tell us what you need and 
we will get those articles which meets 
the need of the membership. We have a 
large disc system on the way from 
SWTPC and will tell you more after we 
go over the system and put it through 
its paces. If there is one thought your 
editor would like to leave—that is we 
in the 6800 universe must join together. 

We welcome a small contingency of 
new members from the Computer In- 
formation Exchange (formerly the SS- 
50 Buss). 


Harold Zallen, Ph.D. 
Editor-Publisher 


MEMTEST 
ALTERED FOR 
SWTPC 
SWTBUG °® 


Emerson Brook’s MEMTEST ap- 
pearing in the first issue of the Journal 
6800 ICCD has been quite well receiv- 
ed. Our readers have asked that we 
provide them with an alteration for use 


with SWTPC SWTBUG®. In response 


00010 NAM 
00020 

00030 % BY DR. 
00040 

60050 AO] MEMBEG EQU 
90060 AG04 MEMEND E£QU 
90070 A000 BSTORE EGU 
$0080 AOOE WRONG EQU 
00090 AQOF RIGHT EQU 
90100 A010 BADMEN EQU 
00110 000A LF EGU 
00220 o00n CR EU 
90130 0008 RS EGU 
90140 EOCC ouTs EQu 
00150 E1lnL GUTEEE EQu 
00160 EOCA OUT2HS EQU 
00170 EOCS CUT4HS EQU 
09180 EO7E PBATAL EQu 
60190 E190 MCL EQU 
00200 OPT 
60210 A014 ORG 
90220 A014 FF A010 ERROR STX 
00230 A017 B7 ADOE STA A 
00240 AOIA F7 AOOF STA B 
00250 ACID CE £19D LOX 
90260 A020 BD E0O7E JSR 
90270 A023 CE ADE LBX 
90280 A026 BD E0CA JER 
00290 A029 BD EOCA JSR 
00300 A02C BD E0Cs JSR 
00310 AOZF FE A010 LDX 
$0320 A032 20 35 BRA 
00330 A04A ORG 
00340 A04A Fé ADDO START LDA B 
60350 AO4D FE A002 LDX 
00360 AOSO E7 00 LOGPi STA B 
90370 ADS2 BC A004 CPx 
00380 ADSS 27 04 BEQ 
00390 ADS7 08 INX 
00400 A0Se SC INC B 
0410 ANSI 20 FS BRA 


90420 AOSB BD EOCC CHECK JSR 


00430 AOSE F& A000 LBA B 
00440 A061 FE A002 LDX 
00450 A064 AS 00 LoOP2 LDA A 
00460 A066 11 CBA 
90470 A067 26 AB BNE 


60480 A069 BC A004 RETURN CPX 


60490 AO6C 27 04 BEQ 
00500 ANGE 08 INX 
00519 AQ6F 5C INC B 
90520 A070 20 F2 BRA 
00530 A072 86 08 CYCLE LDA A 
00540 A074 BD E1D1 JSR 
90550 A077 7C A000 INC 
00560 AO7A 20 CE BRA 
00570 END 


TOTAL ERRORS 00000 
2 


to these requests the program is listed 
below. This program has been tested: 
and appears to function properly. To 
assemble, an EQU for MCL must be in- 
cluded in the EQUATE section. 
Acknowledgement for the original 
work goes to Dr. Emerson Brooks. 


Jack D. Johnson 
2816 Wood Creek Road 
Midwest City, OKLAHOMA 73110 


SWTBUG® are Copyrighted and Registered Trade 
Marks of The Southwest Technical Products Corpora- 
tion, San Antonio, Texas 


HEMTST 


% MEMTEST ALTERED FOR SWTPC SWTBUG 
EMMERSON BROOKS 
% REVISED BY JACK D. JOHNSON 


$A002 TEST START ADDRESS 
$A004 TEST END ADDRESS 
$A000 INITIAL LOAD VALUE 
S$AD0E INCORRECT VALUE 
SAOQOF CORRECT VALUE 
$A010 ERROR ADDRESS 

SOA LINE FEED 

$oD CARRIAGE RETURN 
$08 BACK SPACE 

SEOCC OUTPUT SPACE 

SE1Di PRINT CHARACTER 
$EOCA PRINT 2 HEX» SPACE 
$E0cs PRINT 4 HEX: SPACE 
SEO7E 

$Ei9D END OF LINE 
OeNOSsNOGsP 

$A014 

BADMEN PRINT ERROR MESSAGE 
WRONG 

RIGHT 

@MCL CR» LF 

PDATAL 

SURONG POINT TO DATA 
OUT2H& PRINT INCORRECT VALUE 
OUT2HS PRINT CORRECT VALUE 
OUT4HS PRINT ERROR ADDRESS 
BADMEM RESTORE INDEX 
RETURN 

SA04A 

BSTORE LGAD MEMORY 

MEMBEG 

OsX 

MEMEND 

CHECK END ADBRESS? 

LOOP1 

ouTS MOVE CURSOR 

BSTORE TEST MEMORY 

MEMBEG 

09X 

ERROR GO PRINT MESSAGE 
MEMEND 

CYCLE END ADDRESS? 

LooPr2 

eBS MOVE CURSOR BACK 
OUTEEE 

BSTORE INCR. INITIAL LOaD 
START DG ANOTHER TEST 


TINY WORD 
PROCESSOR 


Here is a word processor Version N. 
(N). It has a lot of nice features. Try it 
out. It is getting larger each time the 
author uses it. It numbers lines and 
gives instructions, etc. 


BGS REM +4WORD PROCESSOR FOR SWTPC++ 
BOL8 REM +44+71M CALDWELL +++ 

BG2G GOSUE 986 

@B25 PRINT "SET STRING => LINE LENGTH" 
O82E REM +4++OUTPUT PORT+++ 

9830 INPUT “PRINTER PORT", P 

9835S INPUT "PRINTER LINE NIOTH", W 

@846 INPUT “LENGTH RAND NUMBER OF LINES", 


BESS REM ++HOME & CLEAR+++ 
GOSUE sey 


GOTO 158 
QU68 PRINT CHRS°163; CHRS{22) 
899 RETURN 

B16 PRINT TABSL+3); "7" 

6105 REM +4++VERTICAL TAB UP+++ 
G11@ PRINT CHRS(11)3; 


8136 PRINT CHRS(11); 

B149 RETURN 

B156 DIM ICNd. ASCND, JECND 

8168 INPUT "NEED INSTRUCTIONS", G$ 

6176 IF ee ae ee 

8100 PRINT “TYPE TEXT BETWEEN THE QUEST 


9196 PRINT “MARKS. 00 NOT USE COMMAS ! 
gre 

2200 PRINT “IF LAST LINE I5 SHORT ADO SF 
O2i0 PRINT "TYPE DONE IF LINES NOT = TO 


B2i5 PRINT “TYPE STOP WHEN debates Aub 
GB2ieé PRINT “SYSTEM ASKS RD COPY." 


(ID 

@250 IF ASCID="DONE" THEN 
8268 GUSUB 199 
276 NEXT I 
O266 GOTO 368 
B2S9 REM +4++ED1T++4 
308 GOSUB 630 
8318 FOR I=iT0N 
O326 PRINT (Tas ASCIS 

NEXT I 


348 GOTO 628 

358 IF ASCCG$I=89THENGZE 
B68 REM +4++JUSTIFV +++ 
GOSUB 930 

eld eee 

aes 60s UE 88B 

O390 NEXT I 


James D. Caldwell, KSOHU 


1001 Trout Avenue 
Port Isabel, Texas 78578 


Editor’s Note: Jim has other revisions...we will 
publish these later. 


THE TSC 
WORD 
PROCESSOR 


These few short words should not be 
construed as a formal review. That will 
come later. Our initial reaction to the 
TSC Editor and Text Processor is 
highly favorable. We have tested in 
some ways the system but as yet have 
not given the system a chance to show 
all it can do. We caution you to read 
the documentation thoroughly. It is 
truly a sophisticated system and the 
price should not fool you. Yes, other 
similar systems are in the thousands of 
dollars range. We plan to put all of our 
typed copy onto the TCS System and 
as we develop our techniques we will 
share them with our readers. For those 
who have not arrived in the disc based 
systems, keep in mind that FLEX+ ++ 
another innovation for the 6800 family 
is a Disc Operation System with many, 
many wrinkles. Dave Shirk, President 
of TSC has asked the users of 
FLEX+ ++ whether they should sup- 
port a user’s group. If TSC does not 
choose to, ICCD will be glad to assist. 
We like FLEX +++ and the entire 
Word Processing System by TSC. 
Keep up that good software for 6800's. 
Smoke Signal Owners, R.L. Smith (in 
this issue) has a means for using TSC 
with your System. SWTPC you will 
soon have a similar patch for the 
Minifloppy Disc System. 


Editor- 
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FDOS SPACE 
SAVER 


You input the name; starting/ending 
address and it will print out, on a PR- 
40, a list of programs with the actual 
amount of program space that each 
program requires. 

This program determines the 
number of sectors on a minifloppy 
diskette to save for a program without 
allowing for a 25% buffer like the flop- 
py disk operating system does. 

The two hex addresses are converted 
to base 10. The difference is computed 
and divided by 256 to determine how 
many sectors are required. This value 
is changed into a hex a decimal number 
as required by the floppy disk 
operating system (FDOS). The reason 
for all of this number swapping, is the 
fact that the FDOS assigns a 25% addi- 
tional buffer to each program space on 
the diskette to allow for program ex- 
pansion. Which is great while develop- 
ing programs. But also means that up 
to 25% of the 90K (22K) of the disk is 
full of nulls. 

The author uses one diskette for a 
scratch pad and when a program is 
finished ( someday a program has to be 
finished ) a space can be ‘created’ that 
does not include the 25% buffer. In the 
example given the FDOS assigned 12 
hex sectors to a OD90 hex program 
(thats 18 base 10 sectors for a 3483 base 
10 program) this program calculates 
that only one hex sectors (14 base 10) 
were needed. 

This results in an additional 4 (base 
10 sectors or one K of storage space 
that is available on the diskette. 

The program should run in any 8K 
basic that has string handling 
capabilities and parts of it should be 
useful to anyone that uses hex notation 
and doesn’t have 16 fingers to count 
on. 

Line 500 is the home and clear for the 
SWTPC CT-1024®. This can be 


‘ changed for other terminals. 


Line 1100 breaks the 4 digit hex a 
decimal address down into 4 individual 
values. By using the MID$() function 
to change them into A$; B$; C$: and 
D$. 

Sub routine 2000 checks for alpha 
characters and assigns a decimal walue 
to N i.e., A-10, B-11, C-12, D-13, E-14 
and F-15. If they are not alpha walwes 
then the actual value of NS is assigned 
to N with the VAL() function. 


Continued om page 4 


Continued from page 3 


Each digit is converted from a base 
16 notation to a base 10 notation by 
multiplying each digit by the decimal 
value of each hex digit. 

The MSB of a 4 digit hex value if 
equal to that value times 4096. The 
next is equal to times 256. The next to 
times 16 and the Isb times 1. 

The program adds these decimal 
values stores them in F(1) after clearing 
the A$ to N§ variables by assigning a 
value of “ (which is nothing) and a 
value of Oto N. 

The next hex a decimal address is 
converted and stored in F(2). 

At line 3000 the difference is com- 
puted and divided by 256 to determine 
the number of sectors base 10 to 
allocate for the program. 

Sub routine 7000 rounds up the 
number of sectors to an even value 
( partial sectors cannot be assigned). 

Starting at line 3070 the decimal 
number of sectors required are con- 
verted to hex decimal which is what the 
FDOS requires. 

The hex decimal equivalent is found 
by dividing by 16 and using the INT() 
to place a value on the first hex digit 
and converting this value to a string 
value with F$= STR$(F) at line 3075. 

The second hex decimal digit is the 
remainder converted to hex idecimal 
notation if greater than 9 i.e., A-B-C- 
D-E-F, 

These values are stored and the 
system set up to calculate another 
value or end the program. 


Files 
Boats 16 03 12 55 2720 34BO 6EOO 

FDOS READY 
$05 68 06 14 88 2406 2FFF 2600 
CHTEST  @3 @@ 43 55 272 2858 6Ea0 
WORDS 63 @3 66 55 2728 2F70 6EOa 
BJACK 4 04 @8 22 070 B646 S100 
SEC/LIST @5 #2 OC 55 2728 2F44 E08 
NAVTEST 66 @4 66 55 2720 2858 6EG0 
SPO/CAL G7 08 @3 55 2720 2907 6Ebe 
BRERD = @7 «G3: B6 55 2728 QAC7? GEOG 
TWRITE 7 89 82 55 2728 278E 6EOR 
SEARCH 68 &1 84 55 2720 2919 6E0e 
EDITOR 68 G5 @E 22 100 OB5SF 6100 
ASSEM 99 69 4F 22 B@80 L7FF o108 
SECTORS REMAINING (HEX? @@E6 

HEX/SEC LISTING 


BREA = 2726 «= 227?) 4 SECTORS 
TWRITE 2728 2783 @4 SECTORS 


SEARCH 2728 2659 a2 SECTORS 
EDITOR 6108 O65F 8B SECTORS 
RASSEM = 1000 A7FF 047) SECTORS 
BIACK B87 «O64 =BG SECTORS 


G@G5 REM 4 JIM CALOWELL KSOHU #8 


6818 REM 4 HEX CONVERSION FOR SWTPC + 
* 
B26 REM 4 MINIFLOPPY 256 BYTE SECT > 


820 GOSUB See 
BO40 PRINT "HEX/SECTOR CALCULATOR 
200 FOR L= 4 10 48 

8240 INPUT “NAME OF PROGRAM", L$CL> 
220 LET X=0 

236 GOTO 1000 

8500 REM 9 HOME AND CLEAR CT-1024 » 
510 PRINT CHRSC16); CHRS(22); CHR$(08); 
520 RETURN 

1600 REM ieee INPUT seek 

41085 LET HS=HSCL) 

1618 INPUT “FIRST HEX ADDRESS", H&L) 
4045 LET HS2H$¢L) 

1028 LET T = 8 

4038 DIGITS: @ 

1106 REM 4 START CONVERSION + 
1140 LET A$ = MIDSCHE, 4,4) 

1128 LET B$ = MIDSCH$, 2,43 

41138 LET C$ = MIOSCHS, 3.13 

4140 LET D$ = MIDSCHS, 4,43 

1208 REM‘ CHANGE HEX TO NUMERIC + 
1240 LET NS=A$ 

1220 GOSUB 2000 

1236 LET T = N*4Q96 

1240 LET NS = BS 

1258 GOSUB 2000 

1260 LET T = T+(N#256) 

4278 LET NS = C$ 

1286 GOSUB 2008 

1250 LET T = T+cwH16) 

1300 LET N¢ = D$ 

1348 GOSUB- 2000 

132@ LET T = THN 

41406 REM me PRINT | kk 

1426 LET Age" 

1438 LET Bg="" 

1448 LET C¢="* 


148 LET N= @ 

1506 REM + SET UP NEXT NUMBER s¥e 
1516 LET X = X+4 

1526 LET F(X) = T 

1538 IF BD = 4 THEN 3086 

1346 LET D=4 

1558 REM #4 GET NEXT HEX 
1568 INPUT "NEXT HEX ADDRESS", IS(L) 
4565 LET HS=I$¢L? 

1578 GOTO 1620 


2006 REM #6 CONVERSION ik 
2618 IF N$ = “AY THEN N = 18 
2026 IF NS = “B" THEN N = 14 
2038 IF N$ = "OC THEN N = 42 
2048 IF NS = “D" THEN N = 43 
2058 IF N$ = “E“ THEN N = 14 
2068 IF N$ = "F" THEN N = 15 
2076 IF NC1@ THEN 2200 
2668 RETURN 

2200 LET N = VALCNS) 

2248 RETURN 


2008 REM *** COMPUTE DIFFERENCE *# 
3818 PRINT 

3825 PRINT 

3838 LET D=F(2)-F¢4) 

3845 GOSUB 7086 

3076 LET F = INTCDC13/16) 

3875 LET F$(L>=STRECF} 

3888 LET S=D¢(4)-(46*INT(0019/16)) 
3098 IF 5 > 9 THEN 5600 

3895 LET 5$<(L9=5TRE(S) 

4006 REM * HEX SEC * 


4616 GUTO 6260 

4160 GOTO 6460 

3088 REM #6 BACK TO HEX ‘i+ 
2016 IF S = 1@ THEN S$="A" 

3826 IF S = 41 THEN S$="5" 

3036 IF S = 12 THEN S$="C" 

9844 IF 5 = 43 THEN S$="D" 

3856 IF S = 44 THEN S$="E" 

0068 IF S = 15 THEN S$="F" 


5676 LET S$(L=5¢ 

6004 REM * FINISH * 

6168 INPUT "ANOTHER CALCULATION", C$ 
6163 GOSUB 5a 

6116 IF LEFT$¢C$,4)="N" THEN Soa0 
6436 NEXT L 
6586 


Pee IF bv256 > INTCD/256) THEN 7208 
7O38 LET DCLI=INTCD/256) 

7046 RETURN 

7108 B(4} = 4 


208 DCL) =INTCDY256) 41 
7248 RETURN 
8003 REM * LIST OF SECTORS #* 


8828 PRINT L$CP); TABCAO)SHECPI5" = "5 TSC 
Pds" —"sFS(PIGS$CP95" SECTORS" 

3830 NEXT P 

S846 FORT= 4 

805 INPUT “ANOTHER LIST", C$ 

e860 IF LEFT$<C$,1>="v" THEN 6508 

3876 CATALOG 


This is a sample of the files function 
for the SWTPC® minifloppy disk 
system first the program name; then 
the track where the program starts; the 
starting sectors; the number of sectors 
allocated for the program (including 
the 25% buffer). The 55 means a basic 
program then the starting and ending 
address the 6EOO is a system code. 

The sample printout shows how 
much diskette space is saved by only 
creating the actual space needed. 


James D. Caldwell, KSOHU 
1001 Trout Avenue 
Port Isabel, Texas 78578 


SWTPC-6800®, AC-30®@, are Registered Copyrights 
and Trademarks of the Southwest Technical Products 
Corporation, San Antonio, Texas. 


HANDY 
DANDY 
LOAN- 
BALANCE 
PROGRAM 


for determining loan 
balances. 


Here is a little program, although it 
is not a large program do not 
underestimate its power. Be sure to in- 
put interest as an annual rate. Note 
Line 3000. This has been included to 
allow you to type from your keyboard 
to simulate typewriter action of your 
PR-40. This print program may be ad- 


Continued on page 5 


Continued from page 4 


ded to other programs to allow the ad- 
dition of text or comments at the end of 
the program or to add an instruction 
list. The ease of its use allows these ad- 
ditions without loading up the word 
processor yet you still have the 
capability of editing. CAUTION: You 
must not use a carriage return. 


LOAN BALANCE 308. 60 
INTEREST RATE 89,25 & 
MONTHLY PAYMENT 58, 62 
FIRST MONTH SEP 

PRYMT INTST PRINC BALANCE 
1 SEP 530.003.85 46.14 453. 35 
2OT B003.49 46.58 447.35 
3 NOV 58.08 3.44 46.85 368. 49 
40EC WO 277 47.22 313. 27 
S JAN 58082441 47.56 265 68 
6 FEB 36.002.64 47.95 247. 73 
7 MPR 3808167 46 32 169. 44 
S APR 36.00136 48.69 126 74 
3 MAY = 50.08 .6.93 49.06 74. 64 
16 JUN 58.088.55 49 44 22.20 
14 JUL 22 37 O17 22 


8001 GOSUE 5a 

@O0S INPUT “PRINTER PORT". P 
628 GOTO 100 

6856 PRINT CHRS(16); CHRS(22); 
80680 RETURN 


166 INPUT “LOAN BALANCE "B 

6110 INPUT "INTEREST RATE °%R 

6428 INPUT “MONTHLY PAYMENT "A 
NPUT "FIRST MONTH "FS 


6168 ed 

176 IF LEFTSCF$, 3)=MSTHENLS@ 

6186 GOTO 168 

i gal "MONTH  PAYMT INTST PRINC BA 


G8 

296 DIGITS= 6 
@306 PRINT Mi 
@385 DIGITS= 2 
GSO6 PRINT M6; TABC9)s Ai TABC45); 1s TABC2L> 
3 Pi TABC2793B 
@309 IF B=8THENS&@ 

RETURN 
8466 DATA JAN, FEB, MAR. APR, MAY, JUN, JUL, RU 


G, SEP, OCT, NOV, DEC, END 
8508 PORT= 1 


@516 END 
$808 INPUT AS: PRINT#?, TABCS); AS: GOTOSORS 


James D. Caldwell, KSOHU 
1001 Trout Avenue 
Port Isabel, Texas 87858 


BAUD 
SELECTION 
IMPROVE- 
MENT FOR 
SWTPC-6800 ° 


After using the SWTPC 6800® /CT- 
1024/AC-30® combination for several 
months, it was decided that im- 
provements were needed which would 
allow the following: 

The single baud rate selector switch, 
which is conveniently located on the 
CT-1024 or CT-64 terminal, should 
select a common rate for both the ter- 
minal and the computer (no need to 
switch two switches). Automatic selec- 
tion to the 300 baud rate should be pro- 
vided when writing to or reading from 
the AC-30® cassette interface (no need 
to remember to switch the selector to 
300 when recording). 

A simple modification, performed 
only to the AC-30® cassette interface, 
can accomplish both the above features 
without loss of any of its existing 
capabilities. 


How it works 

The computer clock output is strap- 
ped (within the computer) for 300 
baud. The terminal clock output is 
selectable from 150 to 1200 baud via its 
baud selector switch. Both of these 
clocks are brought into the AC-30® 
and are available for use, their traces 
where they enter the board are cut 
which frees them from their former 
functions. 

A jumper is not attached between 
pins 3 and 5 of IC6B and this point is 
utilized as a common clock input for 
the terminal and computer. 

The two clocks which were isolated 
when their traces were cut are fed as in- 
puts to a new 7400 chip which is wired 
as a two input data selector whose out- 
put feeds IC6B, pins 3/5. The control 
input to this data selector is connected, 
via 2 diodes to the collectors of Q5 and 
Q6, in such a manner that if either the 
record ready or the read ready lamp is 
lit, 300 baud is furnished to the ter- 
minal and computer, however, if 
neither is lit, the variable baud rate is 
selected. 


Modification Procedures 


1. Install 7400 chip, 1K resistor, 2 


q 


ea., diodes and .05 or .1 Mfd 
capacitor on Radio Shack #276- 
024 socket adapter per drawing 
(note that the socket adapter will 
accomodate 16 pins and the 7400 
only had 14. The diodes ter- 
minate on these extra pads.) 


. Remove the top cover from the 


AC-30®, be sure the AC-30® is 
unplugged because the location 
of its fuse represents a chip 
hazard as well as a safety hazard 
when making this modification. 


. Viewing the AC-30®@ PC board 


from the top rear position, locate 
the trace going from the anode of 
D-8 to the computer connector 
(second pin from the right) and 
cut this trace between the connec- 
tor and D-8. 


. While still viewing the AC-30 


board from the top rear, locate 
the trace going from the center 
connector, (Terminal 16X clock 
output) 5th pin from left end, 
which goes toward the front of 
the board. Cut this trace between 
the points where passed under C- 
21 and R-45. 


. Connect a jumper from the anode 


of D-10 to the trace going to the 
anode of D-3 (this trace disap- 
pears under the end of IC6, at an 
angle). 


. Mount the socket adapter 


assembly, complete with its in- 
stalled components, inside the 
AC-30®. (I mounted mine by 
soldering a 1 1/2" stiff bare 
hookup wire to the wider copper 
grounded area surrounding IC16 
and another to the 5 volt feedthru 
point located between the ends of 
IC9 and IC8, then soldering: the 
grounded wire to the #7 pad and 
the 5 volt wire to the #14 pad of 
the chip socket adapter, with the 
bottom side of the adapter facing 
upward). 


. Connect a jumper wire from the 


cathode of one of the diodes 
mounted on the chip board to the 
collector of Q-5 (which is con- 
nected to one end of R-30). Con- 
nect another jumper wire from 
the other diode cathode to the 
collector of Q-6 (which is con- 
nected to one end of R-31). 


. Connect a jumper wire from pad 


#8 of the chip adapter to the 


Continued on page 6 


Continued from page 5 


anode of D-10 (you already have 
one jumper connected here). 


9. Connect a jumper wire from Pad 
#12 of the chip adapter to the 
connector side of the trace cut in 
step #3. 


10. Connect a jumper wire from Pad 
#5 of the chip adapter to the con- 
nector side of the trace cut in step 


#4. 


11. Connect ground wire to pin 7 of 
chip adapter and +5 V. wire to 
Pin 14 of chip adapter for power 
(if not previously connected 
when mounting the adapter in- 
side the AC-30). 


This completes the modification. 


BAUD SELECTION 
IMPROVEMENT 
FOR CT 1024/CT-64, 
SWTP 6800, 
AC-30 SYSTEM 


PARTS LIST 


1 each SN-7Quad Nand Gate 

1 each 1 K Ohm Resistor 

2 each 9 (or equiv.) Silicon Diode 

1 each 0.05 or 0.1 25 VDC Capacitor 


Testing After Modification 


. Turn on AC-30®, terminal, and 


6800 computer. 


. Set Baud Rate Selector on ter- 


minal to 1200 baud. 


. Reset computer, an “*” should 


come up. 


. Depress “P,” memory dump 


should appear on the screen at a 
1200 baud rate. 


. While observing display, switch 


the record ready lamp on. The 
dump should now be observed on 
the screen at 300 baud. Turn 
record readylamp off. The dump 
should now go to 1200 baud. 


. While observing display, switch 


the read ready lamp on. Again 
the 300 baud dump should be 
observed. Turn the read ready 
lamp off. 


Q-5 COLLECTOR 


You are now ready to use your 
modified system. 


Bob Dunsmore 
6520 N.W. 12th Street 
Oklahoma City, Oklahoma 73127 


SWTPC-6800®, AC-30®, are Registered 
Copyrights and Trademarks of the Southwest 
Technical Products Corporation, San Antonio, 
Texas. 


> TO PIN 3/5 IC6B 


VAR BAUD FROM TERMINAL 


PLUS 5 VOLTS 


Q-6 COLLECTOR 


1 each Socket Adapter (Radio Shack 


or equiv. No. 276-024) Pin BOTTOM VIEW OF SOCKET ADAPTER 


WITH 7400 IC CHIP INSTALLED 


(NOTE THAT CHIP IS INSTALLED IN ADAPTER SO THAT THE BOT- 
TOM 2 PADS ON THE ADAPTER ARE EMPTY) 


300 BAUD FROM COMPUTER 14(PLUS 5V) 


0.05/0.1 


TO PIN. 
3/5 IC6B 


VAR BAUD FROM TERMINAL 


PLUS 5(PIN 14): 
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FROM Q-5 COLLECTOR FROM Q-6 COLLECTOR 


READY for BUSINESS 


We've got it all together—the cost effectiveness and reliability of our 6800 computer system 
with a high capacity 1.2 megabyte floppy disk system. .. PLUS—an outstanding new DOS 


and file management system. 


1 MEGABYTE DISK SYSTEM 


DMAF ‘1 introduces a new level of capability to 
small computer systems. This disk system fea- 
tures two standard size floppy disk drives using 
the new double sided disk and two heads per 
drive. Usable storage space of over 600 kilobytes 
per drive, giving a total of over 1.0 megabyte of 
storage on line at all times. Ideal for small busi- 
ness applications, or for personal ‘‘super’’ sys- 
tems. 


DMA CONTROLLER 


The controller occupies one main memory slot 
in an SS-50 bus and uses the Motorola MC-6844 
DMA controller. The combination of a DMA 


DMAF1 Disk System (assembled).......... 
DMAF1 Disk System (kit)................ 
68/2 Computer with 40K of memory (assembled) 


type controller and double sided disks give the 
system speed of data transfer unobtainable with 
smaller drives. 


OPERATING SYSTEM 


To compliment this outstanding hardware we 
are supplying equally superior software. The 
disk operating system and file management sys- 
tem is called FLEX. It is one of the most flex- 
ible and complete DOS’s available for small sys- 


tems, but just as important; it is easy to use. 
No one can match the variety of compatible 


peripherals offered by Southwest Technical 
Products for the SS-50 bus and the 6800. com- 
puter system. Now more than ever there is no 
reason to settle for less. 


eer ee eee ee er $2,095.00 
sae OMEN sig Seine Wia sma dele $2,000.00 
sar UM a4 WS we a eS 0, sega Y $1,195.00 


SOUTHWEST TECHNICAL PRODUCTS CORPORATION 
219 W. RHAPSODY 
SAN ANTONIO, TEXAS 78216 


6800 
DISASSEMBLER 


One of the most helpful software 
tools in any system library is a 
disassembler. Simply stated, a 
disassembler translates machine code 
into assembly language. This transla- 
tion, of course, cannot insert mean- 
ingful statement labels or comments 
but is often the only way to obtain 
ANY documentation of a program. 
Debugging is easier with a source code 
listing to trace program flow. Pro- 
grams traded with which are poorly 
documented prime candidates to be 
disassembled. Programs which require 
modification to run on a particular 
system configuration should first be 
disassembled. A disassembler is an aid 
to learn both the style and the 
philosophy of the author of a par- 
ticular program. 

Since need has been established for a 
disassembler the author proposed the 
following which has been adapted 
from a disassembler by Hughes (1) in 
1977. (Several alterations have been 
made to take advantage of the author's 
terminal and to change the formatting 
of the printout from the originally 
published version). It is suggested that 
two copies of the disassembler be 
made. One ORGed to $0100 and the 
other to $3100 (or elsewhere not on top 
of your disk or cassette operating 
system). This will allow disassembly of 
programs anywhere in core—although 
some programs may have to be done in 
two parts. 

The program flow is rather straight 
forward. It is assumed you use 
MIKBUG® or SWTBUG® and have a 
parallel printer on port 7. If some other 
printing capability is to be used, 
change the printer initialization routine 
(lines 0340 thru 0380) and the 
subroutine PRINT (lines 2910 thru 
3030). The routine INPUT reads one 
character from your terminal and 
places it in the A register. The routine 
OUTPUT prints a line of text (ter- 
minated by a hex 04) on the terminal. 
The routine BADDR reads a four-digit 
hex address from the terminal and 
places it in the index register. MONIT 
is the address of the system monitor. 

The first section of the program in- 
puts the starting and ending addresses 
for the disassembly and prints a title. 
The 1 (line 0450) and 2 (line 0520) turn 
enhanced mode on and off on the 


author’s printer. (Model IP-125, In- 
tegral Data System). 

The next section attacks the instruc- 
tion to be disassembled. First the ad- 
dress of the instruction is moved to the 
print line. This is followed by the 
machine code instruction. If any part 
of the machine code is a valid ASCII 
character, that character is inserted in 
the printline. Hughes (1) used a table 
(referenced in line 0790) to hold en- 
cripted information about the instruc- 
tion being disassembled. Each entry 
contains a one-byte index into a table 
of mnemonic operation codes, flags set 


.if the A or B registers are referenced, a 


flag set if the instruction causes an un- 
conditional branch, and the length of 
the instruction. This format permits 
selatete easy conversion of this pro- 
gram to handle other instruction sets. 
This table entry is processed and the 
mnemonic operation code moved to 
the print line. The program next deter- 
mines the addressing format used by 
the instruction and sends the operands 
to the print line. Both the relative and 
absolute addresses are given for 
relative addressed instructions. The 
line is then printed. If the use of a state- 
ment label is obvious for the next line, 
a period is inserted for that line. If 
more instructions are t6 be processed, 
the disassembly is repeated. Otherwise 
the word END is printed and control is 
given to MIKBUG® /SWTBUG.® 

The subroutine CNVT converts the 


hex digits in a byte to ASCII and stores . 


them in the location referenced by the 
index register. The subroutine PRINT 
sends output to a parallel port referenc- 
ed by PRINTR. The subroutine CHAR 
is used to insure that only valid ASCII 
characters are moved to the printline. 
The padding following the OPCODE 


PAGE 001 DISASM 

00010 NAM 
00020 801C PRINTR EQU 
00030 E1AC INPUT EQU 
$0040 EO7E OUTPUT EGU 
60050 E047 BABIR EQU 
00060 EOES MONIT EQU 
00079 OFT 
00080 0100 ORG 
00090 0100 20 61 BRA 
00100 0102 0002 ADDR RMB 
00110 0104 0002 DONE RMB 
00120 0106 0002 TEMP RMB 
00130 0108 0001 SAVEOP RMB 
00140 0109 0001 GPRNIA RMB 
00150 010A 0001 OPRNUB RME 
00160 0108 0001 GPINDX RMB 
90170 010C 0001 OPINFO RMB 
00180 0100 S53 QUESTA FCC 
00190 O11D 04 FCR 
00200 O11E 45 QUESTE FCC 


table is required because the author's 
disk system tends to drop data from 
the beginning and end of files. This 
may not be a problem for others. 

A disassembler cannot tell the dif- 
ference between data and instructions. 
This results in data being disassembled. 
When an invalid operation code is 
discovered, the disassembler places 
three asterisks in the operation code 
field of the printout. When valid 
operation codes are found in data 
areas, strange sequences of instructions 
can be generated. Frequent asterisks 
are a good clue to large data areas and 
indicate “instructions” should be ig- 
nored. The sample output included 
here includes part of a data area to 
demonstrate this weakness. Despite 
any weaknesses, the source code pro- 
duced by a disassembler is better than 
no source code at all! - 

Now we know what a disassembler 
is and how this one works. The next 
step is to use its output to solve a pro- 
blem. Perhaps the best approach is to 
use an example. Suppose a program 
you obtained causes your printer to do 
strange things and you suspect the pro- 
blem is caused by an illegal output con- ” 
trol character. The first step is to 
disassemble the program. Since your 
printer is addressed as Port 7 or $801C, 
scan the disassembly for “$801C”. (If 
the program is very large, the 
SWTBUG® FIND instruction may be 
used to locate all occurances of hex 
1C.) The print routine can then be ex- 
amined to find its logical entry point. 
A check for BSR and JSR instructions 
to this point should quickly pinpoint 
the trouble. 

This program should serve as a 
useful addition to your collection of 
programming tools. 


DISASM 
$801C 

$E1AC 

SEO7E 

$E047 

SE0E3 

Gr NOS »NOG oF 
$0100 

START 


ft he et et PPD 


“STARTING ADDRESS’ 


4 


“ENDING ADDRESS’ 
Continued on page 9 
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00210 
90220 
00230 


0240 
00250 


00240 
00270 
$0280 
90296 
00300 
90310 
00320 
00330 
00340 
00350 
003.60 
00370 
00380 
00390 
004900 
0410 
00420 
00430 
00440 
0450 
00460 
00470 
00420 
00490 
00500 
00519 
90520 
00530 
00540 
60550 
00560 
00570 
00580 
60590 
60600 
00610 
00620 
90630 
00640 
00650 
00660 
00670 
00680 
90699 
60700 
60710 
00720 
00730 
00740 
00750 
00760 
00776 
00780 
00790 
60800 
60810 
60820 
60330 
00840 
003850 
0840 
0370 
0880 
00890 
9909900 
00910 
90920 
00930 
00940 
00950 
00960 
00970 
90930 
0990 
01000 
010 10 
010 20 
01030 
01040 
01050 


012C 
0125 
012F 


0136 
0137 


0163 
0166 
0169 
016C€ 
O16F 
0172 
0175 
0178 
0175 
O17E 
9180 
0183 
0185 
0188 
0185 
O18E 
O18F 
0191 
0193 
90194 
0196 
0198 
0198 
019C 
O19E 
O1A0 
O1A2 
O1A4 
O1A6 
01A8 
O1AA 
O1AC 
O1AE 
O1BL 
O1B4 
O1B7 
O1B9 
O1BB 
O1Bn 
O1BE 
O1BF 
o1Ccl 
9104 
9107 
01iCA 
01cn 
01b0 
0103 
o1DS 
oine8 
O1BA 
O1Dn 
O1DF 
O1E2 
Q1ES 
O1E8 
O1ER 
O1EC 
O1EE 
OF’ 
O1F4 
O1FS 
O1FS8 
O1FA 
O1FD 
9200 
9202 
9205 
9207 
020A 
020C 
0200 
0210 
O211 
0212 
0214 
9217 
021A 
O21 
0220 


0100 
EO7E 
E047 
9102 
O11E 
EO7E 
E047 
0104 
8010 
7F 

801C 
oF 

801 
01203 
E07E 


oc 
00 


O1 
00 
E1AC 


00 
on 


QUESTC 


LINE 
START 


TITLE 


CLEAR 


REPEAT 


AA 


KE 


cc 


FCE 
FCB 
FCC 


FCH 
FCC 


LIX 
JSR 
JSR 
STX 
LUX 
JSR 
JSR 
STX 
CLR 
LIA 
STA 
LDA 
STA 
LIX 
JSR 
INX 
LA 
STA 
INX 
LOA 
STA 
JSR 
INX 
STA 
CmF 
BNE 
LIA 
STA 
LDA 
STA 
LDA 
STA 
LIX 
JSR 
LOX 
LIA 
LIA 
STA 
INX 
REC 
BNE 
LX 
LIA 
JSR 
LIA 
JSK 
LOX 
LIA 
STA 
LOA 
STA 
LIA 
STA 
LIX 
STx 
LOG 
ASL 
BCC 
INC 
LIA 
ABA 
STA 
BCC 
INC 
LIX 
LOA 
STA 
LIA 
STA 
AND 
TAR 
LIX 
INX 
REC 
BNE 
STX 
LIX 
STX 
STX 
STX 


Dr DY PrPrryY 


» D> 


>Dr>LbD YY 


P mo D> 


Prbrrpr>D> 


> D> 


SDDpDPr 


4 
Sle $h 
“TITLE: 


4 
445 


#QUESTA 
OUTPUT 
RALIK 
ALTER 
QUEST 
OUTFUT 
BAIR 
DONE 
PRINTRtI 
457F 
PRINTR 
495F 
PRINTR+1 
#QUESTC 
QUTFUT 


#6C 


CLEAR 
#LINE 
AMIR 
CNYVT 
ALLR +4 
CNVT 
ALTE 

4 
SAVEOF 
Lek 

OP RINT 
29x 
OPRNIB 
#0PS 
TENF 
SAVEUF 


BA 
TEMF 
TEMP +4 


TEMP +1 
BR 
TEMP 
TEMF 

x 
OPINDX 
Lox 
GPINFG 
#3 


ADDR 


cc 

ADR 
#$2020 
LINE+S 
LINE+19 
LINE+14 


010 60 
910790 
01030 
01090 
01100 
61110 
91120 
01130 
91140 
01150 
011460 
61170 
01180 
01190 
01200 
01210 
61220 
01230 
91240 
01250 
01260 
01270 
01230 
01290 
01300 
01310 
01320 
01330 
01340 
91350 
01360 
01370 
91380 
01390 
91400 
01410 


0223 
0226 
0229 
022C 
022F 
0232 
0234 
9235 
0237 
023A 
023n 
0240 
0243 
0245 
0246 
9248 
024B 
024E 
0251 
0254 
0256 
0259 
925A 
0250 
0260 
0261 
0263 
0266 
0267 
9269 
026C 
026F 
0271 
9274 
9277 
027A 


AS 


O13 
91638 
0395 
0198 
o3cc 
05 


1F 
0109 
0395 
0109 
O3CC 
04 


OE 

9108 
9395 
OL0A 
03CC 
03 

O10B 


OSn7 
0106 


03 
0106 


03 
0106 
0107 
93 
0106 
0107 
0106 
00 


1420 027C B7 014C 


01430 
01440 
01450 
01460 
01470 
01480 
01490 
01500 
61510 
61520 
01530 
91540 
01550 
01560 
01570 
01580 
91590 
01600 
01610 
01620 


01630 
91640 
01650 
91660 
01670 
014680 
01690 
61700 
01710 
01720 
01730 
01740 
01750 
01760 
01770 
01780 
01790 
01800 
01810 


027F 
0281 
0284 
0286 
9289 
028R 
028E 
9290 
9292 
0294 
0296 
0298 
029A 
O290 
9209 
02A3 
0245 
92A7 
O2RA 
O2AC 


O2AE 
O2B1 
0253 
02B5 
O2H7 
02B9 
O2BB 
O2BD 
O2RF 
02C0 
92C2 
02C5 
02C6 
02C7 
02C9 
02CB 
o2Ch 
02CE 
0200 


A6 
B7 
AG 


E7 


1820 02D2 98 


01830 
01840 
01850 
91860 
01870 
01880 
01890 
01900 
61910 
019.20 
01930 
01940 
01950 
91960 
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9203 
0206 
02118 
O2DA 
O2D8 
O2nn 
O2DF 
O2E0 
O2E1 
02E4 
02E6 
O2E7 
O2EA 
O2En 


Br 
cé 
E7 
08 
Cé 


oD 


EE 


FF 


GG 


REGE 
REGNO 


REL 


NMREL 


NNREL 


oo Sw PPrnm Was PD 


Pap mD i og fos be 


#LINE +e 
SAVEGP 
CNVT 
SAVEOF 
CHAR 


9K 


nD 
OFRNDA 
CNUT 
OF RNGA 
CHAK 
49% 


1d 
OPRNIE 
CNVT 
OPRNIB 
CHAR 
39% 

OP INDX 


#O0PCORE 
TEMP 


EE 
TEMF 


FF 
TEMP 
TEMP +1 
GG 
TEM 
TEMP +1 
TEMP 

x 


LINE+21 


1sX 
LINE+22 
29X 


LINE+23 
E oa 


OPINFO 
#300 
REGNO 
REGS 

$A 
REGNO 
#’B 
LINE+24 
#LINE+27 
LINE+21 
exe 
NOTREL -2 
OPINFG 
$2 
NOTREL~2 
SAVEOP 
a$8L 

REL 

$SF0 
#$20 
NOTREL 
$'% 

x 


at 
OPRNDA 


NMREL 
i= 


OF RADA 
NNREL 


ALDR+L 
ADLR 
CNYT 


Continued on page 10 
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019790 
01930 
91990 
020090 
020 19 
020 20 
020 39 
92040 
02050 
02060 
92070 
020380 
62090 
92100 
92110 
02120 
02130 
02140 
02150 
02160 


021790 
92180 
02190 
02200 
02210 
02220 
02230 
02240 
92250 
02260 
92279 
02280 
02296 
92300 
02310 
62320 
02330 
02340 
02350 
02360 
02370 
02280 
92390 
02400 
02410 
02420 
92430 
02440 
92450 
02460 
02470 
92480 
02490 
62500 
02510 
02520 
92530 
92540 
02550 
02560 
02570 
025380 
02590 
92600 
92610 
92620 
92630 
02640 
92650 
92660 
02670 
02680 


O2F0 
O2F 2 
O2F4 
O2F4 
02F3 
O2FA 
O2FC 
O2FE 
9300 
9302 
6303 
0306 
0308 
030A 
9305 
O30E 
0311 
0314 
0316 
9318 
O31B 
O31E 
0321 
0323 
0325 
9327 
0329 
0325 
9323 
032F 
0331 
0332 
0334 
0336 
0337 
0339 
0335 
9330 
O33F 
0341 
0343 
0346 
0349 
0345 
034E 
0350 
0352 
9354 
9357 
935A 
0350 
O3SF 
0361 
0364 
0367 
0369 
036C 
O36E 
0370 
0373 
9375 
0376 
0377 
0379 
037C 
937E 
9330 
9382 
0384 
0386 
0388 
038A 


A7 


9395 
41 
80 
04 
co 
oS 
23 
00 


0108 
24 
00 


9109 
9395 
O10C 
o1 
06 
010A 
0395 
9108 
60 
08 
Ad 
04 
EO 
OA 
2c 
00 


38 
00 


On 
00 
0A 
ol 
04 
2 
0137 
03C5 
20 
O10C 
10 
02 
2E 
0149 
9102 
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2690 038C 86 04 


02700 
02710 
02726 
02736 
92740 
02750 
62760 
02770 
02780 
02790 
62800 
02810 
028 20 
028 30 


O38E 
0390 
9392 
0395 
0396 
0398 
0399 
039A 
039C 
0390 
O39E 
O39F 
03A0 
O3A1 


A 
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NOTREL 


IMM 


NOIMM 


NOOFR 


INDX 


ILLIGT 


NGLABL 


GOBACK 
FINIS 


CLR 


CBHLH 


TBA 
JSR 
BRA 
CMF 
BEQ 
CMP 
BNE 
LOA 
STA 
IN 
STA 
LOA 
STA 
INKX 
LoA 
JSR 
LIA 
BIT 
BEQ 
LiA 


JSR 
LIA 
CMF 
BEQ 
CMF 
BEQ 
CMF 
BNE 
LBA 
STA 
INX 
LIA 
STA 
INK 
LDA 
STA 
LIA 
STA 
Lie 
STA 
LEX 
JSR 
LOA 
LIA 
ANT! 
BEG 
LDA 
5TA 
LOA 
CMP 
BLT 
BHI 
LIA 
CMF 
BHI 
SMP 
LIA 
LIA 
LOX 
STA 
INX 
BEC 
BNE 
LIX 
LIA 
STA 
LIA 
STA 
LBA 
STA 
LIA 
STA 


PP Db PEP wa > I> 


P zi 


> > 


PrRErPp> 


A 


i 53 D> 


Db ti 


PrDrrprrpyp 


LDA A 


STA 
BSR 
SMP 
PSH 
BSK 
PUL 
INX 
ESR 
TNX 
RTS 
LSR 
LSR 
LSK 
LSR 


& 


PrRPrY 


CNVT 
ILLIGT 
$500 
IMh 
#$C0 
NOLMM 
#4 

x 


SAVEOP 
#4 
x 


OFRNDA 
CNYT 


NOOFR 
OPRNEB 
CNVT 
SAVEGF 
$960 
INDX 
#GA0 
INDX 
$$E0 
ILLi¢T 
$y 

K 


#° xX 
x 


#$0Ti 

x 

F308 
Lok 

#4 

2X 

FL INE 
PRINT 
e 

GP INFO 
#910 
NOL ABL 
#. 
LINE+18 
ADLER 
DONE 
GOBACK 
FINIS 
ALLR+L 
DONE+1 
FINIS 
REPEAT 
#21 

e 
$LINE 


10 


02840 
028 50 
028.40 
02870 
02380 
92890 
92900 
029710 
0292¢ 
92936 
029406 
02950 
02960 
92970 
02980 
02990 
93000 
03010 
03020 
03030 
03040 
630 50 
030 60 
030790 
030 80 
030 90 
03100 
03110 
93120 
03130 
03140 
03150 
03160 
03170 
03186 
03190 
03200 
93210 
03220 
93230 
63240 


03A2 
O5n4 
03A6 
03A8 
O3AA 
O3AC 
O3AE 
O3AF 
03K2 
OSE4 
03B7 
O3B9 
O3BC 
O3BF 
03C1 
03C4 
03C5 
03C7 
03C9 
O3CE 
03CC 
O3CE 
O3n0 
O3n2 
0304 
O3n6 
O3n7 
O3ES 
O3EF 
O3F9 
0407 
0417 
O41F 
0427 
042F 
0437 
043F 
0447 
0455 
O45F 
0469 


86 20 
39 

0001 
0301 
0801 
on01 
0001 
1212 
1502 
1902 
1no2 
2101 
2401 
0001 
2A01 
2081 
3181 


CHHRH 


CHRHOK 


CHAR 


AND 
ADL 
CMP 
BLS 
ADL 
STA 
RTS 
STA 
LIA 
STA 
LDA 
STA 
TST 
BFL 
LDA 
INX 
LIA 
CMF 
BNE 
RTS 
CMP 
BLT 
CMF 
BLE 
LIA 
RTS 
FOE 
FOE 
FIRE 
FOE 
FOB 
FDR 
FOB 
FB 
FOR 
FOB 
FIRB 
Fir 
FOR 
FOB 
FOR 


3S0F 
a°0 
9 
CBHOK 
$7 

x 


PRINTR 
$536 
PRINTR+1 
#$3E 
PRINTR+1 
PRINTR+1 
PLUP 
PRINTK 


x 
$4 
6a 


# 
BAL 
aS7F 
OK 
3 


ir$iO0lsitsisiviss201 
$301994019S501 9360128701 
$8012$9015$A01s$H015$C01 
SHOlsloisivis$EO1s $FOL 
Ls$iO0lsis#ilOlsisisisi 
$1212719$13025$1402 
$159029$16022$17027$1802 
$I902SIAC2s $1 B02 9$1002 
$100 22S$1E022$1F 02792002 
$21901292201 9$2381 9$2341 
$24019$25019$2681 $2641 
Ly$271lvls$281lelels$2901 
S2A0Ls$2KB1 sl el e$2C81 
$2061719$2E81»$2F311$3081 
$3181 583281 917$3381 253481 


SAMPLE DISASSEMBLY 


OSAF 
63B2 
03B4 
0387 
O3B9 
O3BC 
O3BF 
03C1 
0304 
63C5 
03C7 
03C9 
03CB 
e3cc 
O3CE 
o3D0 
O32 
O3Ii4 
0306 
O37 
O3D8 
O39 
O3LA 
OSB 


_ OSnC 


63250 
93260 
93270 
03280 
03290 
033500 
93310 
63320 
03330 
93340 
93350 
03360 
03370 
03380 


OSD 
SDE 
SDF 
O3E0 


0473 
O47F 
6489 
0491 
049D 
0407 
04B1 
04B9 
04C5 
O4CF 
04D7 
04E1 
O4EB 
O4F3 


B7801C 
8636 
B7801B 
863E 
B7801D 
7D801D 
2AF EB 
Bé801C 
038 
AG00 
8104 
26E4 
39 
8120 
2304 
817F 
2F02 
8620 
39 

00 

o1 

O1 

o1 

00 

O1 

00 

o1 

900 

01 


9001 
2041 
3141 
3341 
2002 
3002 
3402 
0001 
2F03 
3303 
3782 
3B82 
3F82 
4303 


Rew 


0 oF 


é 


> 


STAA 
LIAR 
STAA 
LBAA 
STAA 
TST 
BPL 
LBDAA 
INX 
LDAA 
CMPA 
BNE 
RTS 
CMPA 
BLT 
CMPA 
BLE 
LDAA 
RTS 
*xx 
NOP 
NOF 
NOP 
¥KX 
NOF 
XxX 
NOF 
KKK 
NOP 
ENL 


FOB o: 


FOB 


FDB 
FDB 
FDB 
FOB 
FOE © 
FDB 
FOB 
FDB 
FRB 
FOB 
FDB 


FOB © 


$801C 

$936 

$801 

S$3E 

$801 

$801 

4-SFD S$O3BC 
$801C 


$00 9X 
#904 
K-$E6 SO3AF 


4920 
K+$06 $0304 
#37F 
K+$04 $OSD6 
#920 


1963581 ,$2B41 9191292041 
$20419 19$2E43 9 $2F 41 $3041 
$31419$3241919933541 
$3341219635412$2B027191 
$2002 $2D0291»$Z2E029$2F 02 
$30027$3102$352029 i 9 $3302 
$3402 9$356122$35022 $2803 
1912$2C03»$2003»15962E03 


TY $2F037$30037$3103 76320321 


$33039$3403 2636137 $3503 
$3762s$38821$3982719$3A82 
$3B821$3C82915$3N82"$3E82 
$3F829$4082 584103 2$4202 
$4303712$37822 $3882 
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Captain Thomas J. Weaver, USAF 
825 N. Sherry 
Norman, Oklahoma 73069 


HEX/ ASCII 
DUMP 
PROGRAM 


Those of us who have worked with 
Assembler Language on large IBM 
systems have been exposed to the IBM 
Assembler Dump. (At least, those of us 

‘who are not perfect.) One of the nice 
things about the IBM dump is the 
character dump that is provided in ad- 
dition to the hex portion of the dump. 
This can be very useful, since character 
strings can give quite valuable hints as 
to the location of portions of our pro- 
grams or clues as to exactly when or 
why they bombed. Because of their im- 


03390 O4FB 3982 FDB $3982 912$3AG2 > $3BG29$3C82 
03400 9505 4482 FOB $4482 7$3082»$3E82 5 $3F 82 
03410 050D 4082 FOB $4082 5$410291 594302794502 
03420 0517 3782 FDB $3782» $3882 5$3982519$3A82 
93430 0521 3582 FOB $3BG2» $3082» $4482 5 $3082 
03440 0529 3682 FDB $3E82s $3F 82 2$4082 734102 
03450 0531 4602 FE $4602 7 $4302 2 $4502 9 $3783 
03460 0539 3883 FDB $3883 7$39839 i» $3A83 
03470 0541 3B83 FLB $3B837$3C83 $4483 2 $3183 
03480 0549 3E83 FDB $4 $3683» $3F831$4083 14103 
03490 0551 4603 FOB $4603 $4303 264503 2$3742 
03500 0559 3342 FDB $38427$3942911$3A422$3B42 
63510 0563 3042 FDB ob $3042717$3042s$3E42 ‘ 
03520 0S56B 3F42 FDB $3F422%$404291912$4703 
03530 0575 0001 FDB 11$37421 384256394251 
03540 O57F 342 FDB $3A427$3B42 1 $3042 7 $4442 tS 
03550 0587 3D42 FDB $3D429$3E422$3F 425 $4042 ae a 
03560 O58F 0001 FDB 1y19$47022$48022$37421$3842 y 
03570 O59B 3942 FDB $3942915$3A427$3B42 : 
03580 O5A3 3042 FLB $3C429$44427$3D42)$3E42 
03590 OSAB 3F42 FIB €3F 422$404291917$4702 i 
03600 0SBS 4802 FDB $480 27 $37432$3843 1$3943 EN 
03610 OSBD 0001 FIB © 9 1:$30432$3B43»$3C43 
03620 O5CS 4443 FOB —~ $4443,$3B431$3E43 1$3F 43 
03630 O5SCD 4043 FDB $404321217$47032$4803 
03640 05D7 2A OPCOBE FCC * EXXNOP TAP TPAINXDEXCL VSEVCLCSECCLISEI 
03650 O5SFB 53 FCC ’ SBACBATABTBALAAARABRABH I BLSBCCRCSENE BEQ BV4 
03660 0625 42 FCC ’ BUSBPLBMIBGEBLTBGTBLETSXINSPULIIESTXS PSL RT: 
03670 064F 52 FCC “RT IWAISWINEGCOML SRRORASRASLROL DECING 73 TCL 
03680 0679 4A FCC * JMPSUBCMPSBCANDBITLDAEORAICORAAIMCRX GSK LD 
03690 06A3 53 FCC ’ STASTSJSRLDXSTX 
03700 O6BE 41 FCC ‘MODIFIED BY T. J. WEAVER’ 
03710 ENT 
TOTAL ERRORS 00000 

LIST OF REFERENCES The author is a doctorate student majoring in 


computer science at the University of Oklahoma. 
MIKBUG® are copyrighted and Registered Trademarks 
of Motorola Incorporated, Phoenix, Arizona. 
SWTBUG® are copyrighted and Registered 
Trademarks of the Southwest Technical Products Cor- 
poration, San Antonio, Texas. 

IP-125 is a product of Integral Data Systems, Water- 
town, Massachussetts. 


portance the author decided to expend 
a small amount of effort writing a 
HEX/ASCII DUMP PROGRAM. 

The program outputs the address 
followed by the hex data, grouped to 
make it easier to find a specific address. 
This is then followed by a dump of 
those same locations in ASCII. Where 
the content of the byte under con- 
sideration are not printable, the 
character / is substituted. 

The program is not commented (a 
bad habit), so it will be explained as to 
its workings for those who might want 
to modify it. It is assembled at 0000 to 
make it easier for those who want to 
hand assemble their own version to 
move it to whatever location suits their 
systems. Mine is assembled at $DO8O 
and functions as a transient command 
under the Smoke Signal Broadcasting 
Disk Operating System. 
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Upon entry, the program prompts 
for the beginning location of the dump. 
This is then rounded down to the next 
lower number ending in 0. This is used 
as the actual starting address of the 
dump, in order to make it more 
readable. The ending address is then 
obtained and rounded up in a similar 
fashion. The line number is then out- 
put using the OUT4HS routine from 
MIKBUG®. Two additional spaces are 


. thrown in for readability. A pair of 


nested loops is then used to format the 
hex portion of the dump in groups of 
four. After 16 bytes are output, the in- 
dex is reset to the beginning of the line, 
and the ASCII portion of the dump 
begins. The bytes are picked up one at 
a time and compared with the upper 
and lower limits of the ASCII printable 
character set. If these limits are exceed- 
ed, control transfers to the routine NO 
which places the substitute character / 
in the A register in place of the unprin- 
table character. This character may be 
easily changed to any other character 
at the discretion of the individual pro- 
grammer. When the program reaches 
the ending address, the program 
transfers control back to MIKBUG. 
The best way to use this program is 
to add it to whatever operating system 
you are using. It may be reassembled 
or you might use the dump to enter it 
directly, changing the locations that 
refer to relocated storage. I hope you 


_ find it useful. 


NAM DUME 
OFT SYMyNOG9LIS 
COCA OUT2HS Cau $COCA 
E0Cc8 OUT4HS EQU SE0CS8 
Eini OUTCE EQU $E101 
EO7E FOATAL EQU SEO7E 
E047 BADDR EQU $E047 
6000 ORG 6 
0000 CE 00 A? START LOX #SAnb 


0003 Bh EO 7E JSR POATAL 
006s BO EO 47 JSR BADOR 
O009 FF OO Cr STX TEMP 
OOOC Bé OO NO LOAA TEMP +1 
GOOF 84 FO ANDA &$F0 
0011 B7 6O No STAA TEMP41 
0014 CE 00 BC LOX #E ADT 
0617 BO EO 7E JSR POATAL 
001A BD EO 47 JSR BADDF 


0010 FF OO D1 
0020 Bé 00 D2 


STX XHIGH 
LOAA XHIGHti 


0023 SE 10 ADDA #$10 
0025 84 FO ANDA #€$F0 
0027 B7 00 D2 STAA XHIGH+ 1 
0024 24 07 BCC SKIT 
0020 B6 CO Hi LDAA XHIGH 
002F 4C INCA 
0030 B7 00 Il STAA XHIGH 
0033 Bh 0O 9C SKIF SR CRLF 
0036 BL E1 D1 JSR OUTEE 
6039 CE 00 CF LOOF LOX #TEMP 
0O3C BL EO C8 JSR OUT4HS 
OO3F 86 20 LAA €$20 
0041 BD E1 m1 JSK OUTEE 
0044 BU E1 D1 JSR OQUTEE 
0047 FE 00 CF LOX TEMP 
OO4A C46 04 HEXLF1 LDAB #4 
O0O4C BD EO CA HEXLPS JSR OUT2ZHS 
QO4F SA NECE 
Continued on page 12 
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0050 26 FA BNE HOXLPS 
6052 86 20 LOAA #626 - 
0054 BD EL tt JSR OUTEE 
0087 7A 00 HS nec COUNT 
SOSA 26 EE BNE HEXLP A 
OO05C 86 20 LIAM #$20 
OOSE BO EL bi JON OQUTEE 
0061 BO El 1 JSR OUTEL 
' OO64 FF OG CF STX TEMP 
0067 BS 00 HO LOAA TEMP 4d 
= 006A GO 10 SUBA #$16 
C060 B? OO G STAA TEMP+1 
OO6F 24 03 BCC SSNKIF 
9071 7A OO CF GEC TEMP 
’ 0074 C6 10 Sskir LUAB #14 
0076 FE 06 CF LOX TEMP 
0079 AS OO ASCLP LOAA X 
OO78 81 1F CMPA €31F 
6070 23 19 BLS NO 
OO7F B81 7E CHA &$70 
0081 22 15 BHI NO 
0083 Bh E1 G1 BACK JSR OUTEE 
0086 08 INX 
0087 SA ECR 
0088 26 EF BNE ASCLF 
OOBA FF 00 CF STX TEMP 
OOBD BD 00 9C JSR CRLF 
0090 BC 00 D1 CPX XHIGH 
0093 26 A4 BNE LGOF 
0095 7E EO E3 JM SEOQES 
0098 846 5C NO LDAA #°\ 
OO9A 20 E7 BRA BACK . 
OO9C 86 OLD CRLF LuAA #$0D 
OO9E BD Ei v1 JSK OUTEE 
OOA1 86 OA LIAA #$0A 
OOA3 BD Ei D1 JSR OUTEE 
OOA6 39 RTS 
O0A7 OD OA SALL FDB $0D0A 
OCGA? SS Fcc 
OOBB 04 FCB 
OOBC OD OA EAD FUR $O00A 
OOBE 45 FCC 
QOCE 04 S FCB 4 
OoOcr TEMF RME 2 
oobi AWITGH RMB 2 
OOns COUNT RMB 1 
END 
NO ERROR(S) DETECTED 
SYMBOL TABLE: 
ASCLF oGr79 BACK o0cs 
CRLF co?7c CADD OOBC 
LOOP 0039 NO 0098 
GUTEE E1Bi PDATAL EO7E 
SSKIF 0074 START 0000 
DUKP 
STARTING ADDRESS: 0000 a 
ENDING ADDRESS: OoD3 


0000 CL 0G A7 BD EO 7E LD EO 47 rr 
0010 FO B7 00 DO CE 00 BC BD EO 7E 
0020 Bé 00 D2 8B 10 84 FO B7 00 b2 
0030 B7 00 DI BD 00 9C BD Ei bi CE 
0040 20 BD El Bi BD Ei Di FE 00 CF 
0050 26 FA 86 20 BD El Di 7A 00 D3 
0060 Di BD E1 Di FF OO CF &4 00 LO 
0070 03 7A 00 CF Cé 10 FE 00 CF Ad 
0060 7E 22 15 BD E1 D1 08 SA 26 EF 
0090 BC 00 D1 26 A4 7E EO ES 86 5C 
OOAO Di G6 OA BD Ei Di 37 OL OA 53 
OOBO 47 20 41 44 
O0CO 44 49 4E 47 20 41 44 44 §2 45 


OODO 20 20 20 20 20 20 20 20 20 20 


BFD-68-2 Smoke Signal Broadcasting®, are 
Registered Trademarks and Copyrights of the 


Smoke Signal Broadcasting Corporation, 
Hollywood, California. 
MIKBUG® is a registered Trademark of 


Motorola, Incorported. 


“STARTING ADDRESS? / 
4 


ZENDING ADDRESS? / 


bag E047 COUNT 00ns 
HEXLPL 0044 HEXLP2 G04 
OUT2ZHS EOCA OUT4HS EOCS 
Saou OO0A7 SNIF 0033 
TEMF OOCF XHIGH ooni 
co 88 B86 00 DO $4 NNAAANGNANNASS 


SAS AAAAAAANGASS 
ANANAAANSSNESANAL 
VASA AANA 
NASNANNANANNNSAZ 
BNN NANZNNBNN ONS 
NANNANASANNANANS 
Ne VANS ENS 
WPENNNANZENANANAS 
NANBAANANN ANNANN 
\ANAANPNASTARTIN 
G ADDRESS? \\\EN 
DING ADDRESS \ 


Captain Paul Dobbs, USAF 
4348 Brom Bones Alley 
Fort Worth, Texas 76114 
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DISC TEXT 
PROCESSING 


If text processing is your ‘thing’ and 
you have Smoke Signal Broadcasting’s 
BDF-68® floppy disc system and 
Technical Systems Consultants® 
SL68-29, v.2.3 text processor program, 
then here is an offer you can’t ( hardly ) 
refuse. After all its free. Its ‘disc text 
processing’. Adding this program to 
the SL68-29 allows the text processor 
to call text from a disc file with the on- 
ly restriction on the length of the pro- 
cessed text being the storage space 
available on the disc. Total ram 
memory requirement, regardless of 
text size, is 9584 (decimal) bytes. All 
features of the TSC TEXT PRO- 
CESSOR are retained. 

After loading the TSC text processor 
and ‘disc’ programs into ram the pro- 
gram should be saved as a transient 
command program as follows: 


SAVE, DTEXT, 200,20CA, 2003, $ 
(CR) 


Calling text files into the processor is 
accomplished through either of two 
methods. The first is to include the text 
‘filename’ when calling the processor 
separating the two files with a comma. 


DTEXT, TEXT FILENAME (CR) 


The second method is particularly 
useful when you forget to use the first 
and, with single disc systems, when the 
text and processor are on different 
discs. To use it call the disc processor 
from disc followed by a carrage return. 


DTEXT (CR) 


The processor will run as usual up to 
where actual text processing begins. At 
this point the program requests a file 
name which the user supplies followed 
by a carrage return. 


FILE NAME: TEXT FILENAME 
(CR) 
Initial program entry has been 


changed to 2003 (hex) to allow reset- 
ting of flags required by the disc pat- 
ches. After processing, or in the event 
of a system error, control is returned to 
the DOS monitor program through 
ZWARMS after printing an error 


Continued on page 13 
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message and type number if any are 
detected. Extensive use has been made 
of subroutines in the DOS. Smoke 
Signal has provided jump points for 
these routines as well as an excellent 
description of the functioning of each 
in the BFD-68 operating manual. A lit- 
tle time spent on this portion of the 
manual will provide a good deal of 
help in understanding the inner work- 
ings of the DOS as well as the basis for 


writing your own disc system pro- 
grams. 

One final note, the disc program 
uses a 1-K buffer memory for storing 
text from disc prior to processing. The 
length of this storage was chosen 
somewhat arbitrarily and may be 
shortened or lengthened as desired by 
changing the buffer end address 
specified in the program at hex ad- 
dresses 2014 and 2015 (BUFST + $400). 
The shorter the buffer memory the 
more frequently will it require refilling 
from disc. 


DISC TEXT PROCESSOR 


PATCHES TO ALLOW TSC TEXT PROCESSOR 
VERSION 2-3 TO OPERATE FORM SMOKE 
SIGNAL BROADCASTING DISC SYSTEM. 


1972 MACTBL EQU $1972 
0212 INTRO EQu $212 
OOFA MACEND EQu SFA 
0097 FSTRAM Eau $97 
0099 LSTRAM EQu $99 
0098 NXTRAM EQu $9B 
009D JNKCNT Eau $9D 
14D6 INCHR2 EQu $14D6 
7283" ZWARMS EQuU $7283 
729% ZFLSPC EQu $7291 
7294 ZGCHAR EQu $7294 
71297 ZGNCHR EQu $7297 
T29Aa ZANCHK EQu $729A 
729D ZDIE EQu $729D 
72A0 ZGETHN EQu $72A0 
7T2A3 ZADDX EQU $7243 
712A6 ZOUTST EQU $72A6 
72a9 ZTYPDE EQu $72A9 
72BS ZLINEI Eau $72B5 
7780 ODFM EQu $7780 
7783 CDFM EQu $7783 
7786 DFM EQU $7786 
2000 ORG $2000 
2000 00 BTEMP FCB 0 
2001 00 00 XTEMP FDB fe) 


ENTRY POINT FOR DISC VERSION 


2003 7F 00 38 DISCST CLR RPFLG CLEAR REPEAT FLAG 
2006 7E 02 12 JMP INTRO ENTER MAIN PROC PROGRAM 
2009 CE 19 72 DWORD LDx @MACTBL 
200C DF FA STX MACEND 
200E CE 21 71 PROCST LDX #BUF ST START OF BUFFER MEMORY 
2011 DF 97 STX FSTRAM END OF BUFFER 
2013 CE 25 71 LDX #BUFST+$400 
2016 DF 99 STX LSTRAM 
2016 86 00 LDA A 60 SET JUNK COUNT - FOR CORES 
201A 97 9D STA A JNKCNT EDITOR SET TO § 
201C 7D 00 38 TST RPFLG eRP INSTRUCTION? 
201F 27 0S BEQ DWORD2 
2021 87 00 38 STA A RPFLG CLEAR FLAG 
2024 20 18 BRA RETN 
2026 BD 72 94 DWORD2 JSR ZGCHAR LOOK FOR A COMMA 
2029 81 2C CMP AO", IF NONE ASK FOR 
2028 27 09 BEQ SKIP FILE NAME 
202D CE 20 B9 LOX sMsG 
2030 BD 72 A6é JSR ZOUTST PRINT MSG 
2033 BD 72 BS JSR ZLINE!T GET FILE NAME 
2036 CE 20 CB SKIP LDX #FCB 
2039 BD 72 91 JSR ZFLSPC LOAD FCB WITH FILE NAME 
203C 25 aF BCS ERR] CHECK FOR DFM ERRORS 
203E BD 20 45 RETN JSR OPEN OPEN FILE 
2041 BD 20 76 JSR FILBF STORE IN BUFFER 
2044 39 RTS 
OPEN FILE FOR READING 
2045 86 04 OPEN LDA A 64 OPEN FILE MODE 
2047 CE 20 CB LDX oFCB LOAD FILE CONTROL BLOC IN X 
204A AT 00 STA A 00X STORE IN XFC OF THE FCB 
204C BD 77 86 JSR DFM REQUEST DFM OPEN FILE 
204F 26 IC BNE ERR! LOOK FOR ERRORS AND PRINT #6 
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08 
0 
6 
6 
NATIONWIDE CLASSIFIED NEWSLETTER 
MAILED 142 CLASS EVERY THREE WEEKS 


Seeesceeeee ee 


See eee ee & 


ARE YOU LOOKING FOR ? 
LOW COST USED COMPUTER EQUIPMENT 
ADVANCED INFORMATION ON NEW PRODUCTS 
NEW SOFTWARE: UTILITIES/BUSINESS/etc. 


A WAY TO ASK FOR INFORMATION OR AID 
INFORMATION ON COMPUTER CLUB MEETINGS 


IT'S ALL IN ON_LINE | 


eeeecetoaeeeee 


eeecke eee eee 


® 18 ISSUES (1 Yr. )-$3.75 36 ISS.-$7.00 * 
a Sample on request, or added to subserip, 
s 24695 SANTA CRUZ HWY. & 
* LOS GATOS, CA 95030 * 
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2051 86 0S 
2053 a7 00 
2055 39 


2086 FF 20 01 
2059 CE 20 CB 
205C 8D 77 86 
20SF 27 06 
2061 A6 Ol 
2063. 81 06 
2068 26 06 
2067 86 1A 
2069 FE 20 Ol 
2066 39 


206D BD 72 ag 


2070 8D 77 83 
2073 7E 72 83 


2076 7F 00 37 
2079 DE 97 
207B DF 9B 
207D 96 99 
207F 27 17 
2081 8D D3 
2063 61 IA 
2088 27 058 
2087 A7 00 
2089 08 

208A 20 FI! 
206C B7 00 37 
208F 09 

2090 A6 00 
2092 81 OD 
2094 26 F9 
2096 DF 99 
2096 DE 97 
209A 39 


2098 F7 20 00 
209E 7D 00 37 
20Al 26 0B 


+» 20A3 BD 20 76 


20A6 F6 20 00 
20A9 86 00 
20AB 7£ 14 06 
@O0AE 86 1A 
2080 20 F9 


20B2 BD 77 83 
2085 7C 00 38 
20B8 39 


20B9 OD 
20BA OA 04 
20BC 04 04 
20BE 46 
20BF 49 4¢ 
20C! 45 20 
2063 4E 41 
2065 aD 45 
2067 20 3A 
2069 20 
20Ca 00 


20ca 


2171 
2870 


3037 
8037 
6038 


0209 
0209 7E 20 70 


1akl 
14E1 7E 20 9B 


i 


LDA A #5 
STA A 0sX 
RTS 
READ FROM OPENED FILE 
READ STX XTEMP 
LD FCB 
JSR DFM 
BEQ NOEZRR 
LDA A J3oX 
CMP A 06 
BNE ERRI 
LDA A #$1A 
NOERR LDX XTEMP 
RTS 
ERROR REPORTING ROUTINE 
ERR! JSR ZTYPDE 
ERR2 JSR CDFM 
JMP ZWARMS 
FILL BUFFER FROM DISC 
FILBF CLR FIN 
LDX FSTRAM 
STX NXTRAN 
FILL) CPX LSTRAM 
BEQ FILL4a 
BSR READ 
CMP A #SlA 
BEQ FILLE 
STA A 05X 
INX 
BRA FILL 
FILL2 STA A FIN 
FSLL3 DEX 
LDA A 05X 
CMP A #S8D 
BNE FILL3 
STX LSTRAM 
PILL4 LDX FSTRAM 
RTS 
REFILL BUFFER FROM DISC 
BUFRFL STA B BTEMP 
TST FIN 
BNE END! 
JSR FILBF 
LOA B- BTEMP 
LDA A 60 
out! JMP INCHR2 
END! LOA A #S8IA 
BRA ouT! 


oRP INSTRUCTION 


RESTRT JSR 
Inc 
RTS 


¥SG FCB 


Fcc 


FCB 


SET FCB TO READ MODE 


SAVE INDEX 


REQUEST DFM ENTER READ 
CHECK FOR DFM ERRORS 


CHECK ERROR TYPE 


FOR EOF (#6) 


IF NOT EOF PRINT ERROR #@ 
LOAD PROC EOF IN REG A 


RESTORE X 


PRINT ERROR TYPE #@ 


CLOSE ALL OPEN FILES 
RETURN TO MONITOR 


CLEAR FIN FLAG 


LOAD START OF BUFFER 


NEXT RAM ADOR 
BUFFER FULL? 


GET MORE DATA FROM DISC 
LOOK FOR PROC EOF 


FILL BUFFER 


BACK UP LOOK FOR LAST CR 


SET BUFFER ENO 


SAVE B 
EOF? 


CLEAR A OF GARBAGE 


RETURN TO PROC 


SET PROC EOF CONT.Z 


RELOAD FROM TOP 


CDFM CLOSE FILES 
RPFLG SET REPEAT FLAG 
SDs $As 82 454 


/FILE NAME ¢ / 


0 


FILE CONTROL BLOC 


FCB RMB 


BUFFER STORAGE 


BUF ST RMB 
RMB 
FLAG STORAGE 
ORG 
FIN RNB 
RPFLG RMB 


PATCHES IN TSC TEXT PROCESSOR PROGRAM V.2.3 


ORG 
JMP 


ORG 
JMP 


14 


166 


$209 
ERR2 


Si4Ei 
BUFRFL 


END OF BUFFER FY! 


DISC FILE END 
REPEAT FLAG 


EXIT TO MONITOR 


CLOSE FILES RETURN TO MON 


FILL BUFFER & SET EOF 


FILL BUFFER 


Continued on page 15 
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BALIBAGO 
DOUBLE 
STANDARD 


Or a Hardwired Approach 
to Adding 1200 Baud to 
the AC-30" Cassette 
Interface 


RESTART FROM START 
eRP INSTRUCTION 


14E5 

14E5 BD 20 B2 RWND 
14E8 39 

0338 DISC SETUP 
0336 BD 20 09 

0338 01 

633¢C OL 


SYMBOL TABLE: 
BTEMP 2000 
DFM 7786 
END! 20AE 
FILBF 2076 
FILLS 2096 
INTRO 0212 
MACTBL 1972 
ODFM 7780 
READ 2056 
RVND 14ES 
ZANCHK 729A 
ZGETHN 72a0 


7783 
2026 
20CB 
208F 
Y4D6 
OOFA 
0098 
200E 
0038 
72A3 
7294 
72A6 


2171 CDFM 
2009 DWORD2 
2070 FCB 
208¢ FILL3 
0097 INCHREe 
9099 MACEND 
2069 NXTRAM 
20AB PROCST 
203E RPFLG 
2001 ZADDX 
7291 ZGCHAR 
7288 ZOUTST 


BUF ST 
DWORD 
ERR2 
FILL2 
FSTRAM 
LSTRAM 
NOERR 
OUT! 
RETN 
XTEMP 
ZFLSPCG 
ZLINEI 


BUFRFL 
DISCST 


Ok, we've got our Mikbug® and 
out TVT-II running at 1200 baud. Why 
not go all the way as we used to say 
and also bring the AC-30® up to full 
speed? Actually its not a very difficult 


feat, and for results — how does 
Z@NCHR 


ZTYPDE 72a9 ZWARMS 


R. Lynn Smith 


7713 Glenister Drive 
Springfield, Virginia. 22152 


BDF-68® Disc Operating System are Copyrighted and 
Registered Trademarks of the Smoke Signal Broad- 


‘casting Corporation, Hollywood, California. 


TSC® Text Processing System and FLEX® Operating 
System are Copyrighted and Registered Trademarks of 
the Technical Systems Consultants Incorporated, West 
Lafayette, Indiana. 


The Best SELECTRIC II* Printer Going 
for ANY Computer! 


SELECTRA-TERM is a_ brand 
new IBM Selectric II* typewriter 
which has been fully converted 
for direct connection to your 
computer. A special typing ele- 
ment gives you full ASCII and 
upper/lower case alphanumerics. 


their own factory warranty on the 
electronics conversion. 


Complete electronics package, 
cable sets and documentation are 
supplied. Price is $1750 with 
many options. Ask your dealer 


loading 8K basic in about 75 seconds 
sound? 

Unfortunately, as with so many 
good ideas this one was not original 
with us. Vic Bolstad and I were in- 
spired to work on a hardware based 
1200 baud cassette system by Helmers. 
Helmers (1) describes a software ap- 
proach to operating an unmodified 
(AC-30® at 1200 bps which is in- 
teresting but not entirely consistent 
with the Mikbug® based mode of 
operation we were used to. Arriving 
almost the same day was Huffman’s 
description (2) of increasing the speed 
of Mikbug® by increasing the clock 
frequency feeding the MP-C control in- 
terface board (also refer Hilbun (3). 
What Vic and I really wanted was to 
operate our systems at both 1200 and 
300 bps, switch selectable from the 
front panel. What we came up with 
was a surprisingly simple arrangement 
we call the “Balibago Double 
Standard.” In keeping with the practice 
established by BYTE Magazine we 
named it after the city where it was 
developed, Balibago, Pampanga, 
Republic of the Philippines, a small 
recreational and retirement community 
in Central Luzon. 

One of the features of the Kansas Ci- 
ty Standardwhich | personally feel has 
been greatly over exaggerated in im- 
portance is the self-clocking feature. 
This is used to derive an approximate 
(depending on the tape speed) 4800 Hz 


You also have backspace, tab, in- for details or contact: sign al te be teed as 2 clock frequency 
dex and bell—all under computer . : A 

control. MCD during read operations. The idea at 
SELECTRA-TERM can also be micro a first glance is good but, my experience 


used as a standard typewriter. It 
has been approved for computer 
use and comes with the IBM war- 
rénty. You may also obtain the 
yearly service agreement for the 
typewriter portion. MCD provides 
*Reg. trademark of IBM Corp. 


computer 

devices, inc. p EEE 

SS aaaey 

960 E Orangethorpe, Bldg. F 
Anaheim, California 92801 
Telephone (714) 992-2270 
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has been that, at least with the AC- 
30®, it causes more trouble than it 
cures. My disconnecting this line and 
connecting the 6800 MP-C board 
transmitter clock line directly to the 


Continued on page 16 


Continued from page 15 


MP-C receiver clock input has resulted 
in consistently better copy. Cassette 
speed variation does not appear to be 
the problem the designers of the 
- Kansas City Standardthought it would 
be. Besides, removing the self-clocking 
feature makes using the AC-30® at 
1200 Baud much easier. The same pro- 
cedure should be followed with the 
TVT-II UART'’s receiver clock input. A 
feature that should be added also is to 
feed the TVT-II UART clock inputs 
from the MP-C data clock. Doing this 
allows you to switch the speed of 
everything from 300 to 1200 (or other 
rates below 1200) at the same time and 
with only one switch. 


ADDITIONAL CIRCUITY 

At 300 baud a mark represents eight 
cycles at 2400 Hz, a space four cycles at 
1200 Hz. This provides a lot of room 
for slop, and the lack of phase coheren- 
cy between data and tone frequencies 
other than causing a tolerable increase 
signal distortion may be ignored. This 
is most definitely not the case at 1200 
baud where we have only one cycle at 
1200 Hz in which to recognize a space. 
What this boils down to is the need to 
assure that the start (zero crossing) of a 
mark or space tone burst occurs 
reasonably close to mark-space transis- 
tions coming from the computer. 

Phase synchronization to within ac- 
ceptable limits is acheived by utilizing 
the 76.8 KHz output available as one of 
the unused clock frequencies from the 
Motorola MC14411 bit rate generator 
on the SWTPC® 6800 MPU board. In 
my system | connected this output (pin 
2 of the bit rate generator) to the 150 
baud line (any unused line will do) 
with a short jumper in order to get it 
onto the bus and into the control inter- 
face board where it then through the 
interconnecting cable becomes the AC- 
30® clock input. Of course, discon- 
nected the 150 baud line is discon- 
nected from the bit rate generator (pin 
8) first. In the AC-30® this signal is 
first divided by either two or four 
depending on the output data and then 
by 16 down to the 2400 or 1200 Hz 
tones seen by the recorder. Syn- 
chronization with the mark-space tran- 
sistions to within plus or minus 1/16th 
of a cycle is achieved by resetting the 
7493 to zero each time the control in- 
terface data output switches from high 
(mark) to low (space). Since the same 
tone frequencies are used at both 1200 
and 300 baud the divider circuit re- 
mains in for operation at either speed. 


DATA READ. 

Although the demodulator used in 
the AC-30® leaves some room for im- 
provement when operated at 1200 
baud, no changes other than discon- 
necting the read clock as discussed 
above, should be necessary in order to 
read data recorded at either 1200 or 
300 baud. Remember it is necessary for 
the clock frequency to match the read 
data rate feeding into the UART 
receiver input. 

If there is further interest, perhaps is 
a future article we can discuss some 
possible improvements to the 
demodulator in the AC-30®. 


CONSTRUCTION 

Since only two additional IC's are in- 
volved construction is an easy matter. 
The AC-30® supplies the necessary + 
5 VDC. Simply mounting the two IC’s 
on a small universal PC board on 
stand-offs above the main AC-30® 
board in a convenient spot works out 
well and by lifting the end of R2 that 


grgac uger gy, 


ties to pin 1 of IC5A the counter input 
and output may be connected to the 
AC-30® board. A jumper wire to Pin 
1 of IC2 supplies data information for 
resetting the counter. 


R. Lynn Smith 
7713 Glenister Drive 
Springfield, Virginia 22152 
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